﻿Imports Microsoft.VisualBasic

Public Class CommonEntity



    Private m_DefaultWorkFlowRev As String = ""

    ''' <summary>
    ''' 默认工艺流程版本
    ''' </summary>
    Public Property DefaultWorkFlowRev() As String
        Get
            Return m_DefaultWorkFlowRev
        End Get
        Set(ByVal value As String)
            m_DefaultWorkFlowRev = value
        End Set
    End Property ''工装：根据BOM分解出来的批次默认WorkFlowRev。苗 2012-03-30 11:00

    Private m_DefaultWorkFlowName As String = ""

    ''' <summary>
    ''' 默认工艺流程名称
    ''' </summary>
    Public Property DefaultWorkFlowName() As String
        Get
            Return m_DefaultWorkFlowName
        End Get
        Set(ByVal value As String)
            m_DefaultWorkFlowName = value
        End Set
    End Property ''工装：根据BOM分解出来的批次默认WorkFlowName。苗 2012-03-30 11:00



    Private m_DefaultStartReason As String = ""

    ''' <summary>
    ''' 默认开始原因
    ''' </summary>
    Public Property DefaultStartReason() As String
        Get
            Return m_DefaultStartReason
        End Get
        Set(ByVal value As String)
            m_DefaultStartReason = value
        End Set
    End Property ''工装：根据BOM分解出来的批次默认开始原因。苗 2012-03-22 10:15

    Private m_DefaultLevel As String = ""

    ''' <summary>
    ''' 默认批次层次
    ''' </summary>
    Public Property DefaultLevel() As String
        Get
            Return m_DefaultLevel
        End Get
        Set(ByVal value As String)
            m_DefaultLevel = value
        End Set
    End Property ''工装：根据BOM分解出来的批次默认开始原因。苗 2012-03-22 10:15

    Private m_GYBZTiQing As String = ""

    ''' <summary>
    ''' 工装订单提请工艺编制状态
    ''' </summary>
    Public Property GYBZTiQing() As String
        Get
            Return m_GYBZTiQing
        End Get
        Set(ByVal value As String)
            m_GYBZTiQing = value
        End Set
    End Property ''工装：订单提请工艺编制后所处的状态。苗 2012-03-22 12:05

    Private m_GYBZQueRen As String = ""

    ''' <summary>
    ''' 工装订单工艺编制确认状态
    ''' </summary>
    Public Property GYBZQueRen() As String
        Get
            Return m_GYBZQueRen
        End Get
        Set(ByVal value As String)
            m_GYBZQueRen = value
        End Set
    End Property ''工装：订单提请工艺编制后所处的状态。苗 2012-03-22 12:05

    Private m_DispAll As Boolean = False

    ''' <summary>
    ''' 是否查看全部信息
    ''' </summary>
    Public Property DispAll() As Boolean
        Get
            Return m_DispAll
        End Get
        Set(ByVal value As Boolean)
            m_DispAll = value
        End Set
    End Property

    Private m_FactoryName As String = ""

    ''' <summary>
    ''' 当前登录用户车间名称
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property FactoryName() As String
        Get
            Return m_FactoryName
        End Get
        Set(ByVal value As String)
            m_FactoryName = value
        End Set
    End Property

    Private m_BHPPath As String = ""

    ''' <summary>
    ''' 不合格品审理单路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property BHPPath() As String
        Get
            Return m_BHPPath
        End Get
        Set(ByVal value As String)
            m_BHPPath = value
        End Set
    End Property

    Private m_BFDPath As String = ""

    ''' <summary>
    ''' 报废单路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property BFDPath() As String
        Get
            Return m_BFDPath
        End Get
        Set(ByVal value As String)
            m_BFDPath = value
        End Set
    End Property

    Private m_PGDPath As String = ""

    ''' <summary>
    ''' 派工单路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property PGDPath() As String
        Get
            Return m_PGDPath
        End Get
        Set(ByVal value As String)
            m_PGDPath = value
        End Set
    End Property

    Private m_SelfPath As String = ""

    ''' <summary>
    ''' 100%自检表路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property SelfPath() As String
        Get
            Return m_SelfPath
        End Get
        Set(ByVal value As String)
            m_SelfPath = value
        End Set
    End Property


    Private m_WgjlPath As String = ""

    ''' <summary>
    ''' 委托计量单
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property WgjlPath() As String
        Get
            Return m_WgjlPath
        End Get
        Set(ByVal value As String)
            m_WgjlPath = value
        End Set
    End Property

    Private m_LscydPath As String = ""

    ''' <summary>
    ''' 临时超越单
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property LscydPath() As String
        Get
            Return m_LscydPath
        End Get
        Set(ByVal value As String)
            m_LscydPath = value
        End Set
    End Property

    Private m_KldPath As String = ""

    ''' <summary>
    ''' 颗粒度检查
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property KldPath() As String
        Get
            Return m_KldPath
        End Get
        Set(ByVal value As String)
            m_KldPath = value
        End Set
    End Property

    Private m_XzdPath As String = ""

    ''' <summary>
    ''' 协作单
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property XzdPath() As String
        Get
            Return m_XzdPath
        End Get
        Set(ByVal value As String)
            m_XzdPath = value
        End Set
    End Property

    Private m_gyCardPdf As String = ""
    ''' <summary>
    ''' 工装工艺卡片
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property gyCardPdf() As String
        Get
            Return m_gyCardPdf
        End Get
        Set(ByVal value As String)
            m_gyCardPdf = value
        End Set
    End Property
    Private m_jpLDBpath As String = ""
    ''' <summary>
    ''' 军品流动本
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property jpLDBpath() As String
        Get
            Return m_jpLDBpath
        End Get
        Set(ByVal value As String)
            m_jpLDBpath = value
        End Set
    End Property
    Private m_ProblemDocPath As String = ""
    ''' <summary>
    ''' 新闻公告附件
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property ProblemDocPath() As String
        Get
            Return m_ProblemDocPath
        End Get
        Set(ByVal value As String)
            m_ProblemDocPath = value
        End Set
    End Property

    Private m_ZLJZDPath As String = ""
    ''' <summary>
    ''' 质量记载单路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property ZLJZDPath() As String
        Get
            Return m_ZLJZDPath
        End Get
        Set(ByVal value As String)
            m_ZLJZDPath = value
        End Set
    End Property

    Private m_GYBZPath As String = ""
    ''' <summary>
    ''' 工艺编制路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property GYBZPath() As String
        Get
            Return m_GYBZPath
        End Get
        Set(ByVal value As String)
            m_GYBZPath = value
        End Set
    End Property

    Private m_GZJDPath As String = ""
    ''' <summary>
    ''' 工装鉴定路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property GZJDPath() As String
        Get
            Return m_GZJDPath
        End Get
        Set(ByVal value As String)
            m_GZJDPath = value
        End Set
    End Property

    Private m_ck8FactoryName As String = ""
    ''' <summary>
    ''' 工装鉴定路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property ck8FactoryName() As String
        Get
            Return m_ck8FactoryName
        End Get
        Set(ByVal value As String)
            m_ck8FactoryName = value
        End Set
    End Property

    Private m_AppraisalPath As String = ""

    ''' <summary>
    ''' 首件鉴定报告附件路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property AppraisalPath() As String
        Get
            Return m_AppraisalPath
        End Get
        Set(ByVal value As String)
            m_AppraisalPath = value
        End Set
    End Property

    Private m_DLDHPath As String = ""

    ''' <summary>
    ''' 代料单附件路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property DLDHPath() As String
        Get
            Return m_DLDHPath
        End Get
        Set(ByVal value As String)
            m_DLDHPath = value
        End Set
    End Property

    Private m_GZHGPath As String = ""

    ''' <summary>
    ''' 工装合格证PDF生成路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property GZHGPath() As String
        Get
            Return m_GZHGPath
        End Get
        Set(ByVal value As String)
            m_GZHGPath = value
        End Set
    End Property

    Private m_GZSYPath As String = ""

    ''' <summary>
    ''' 工装合格证PDF生成路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property GZSYPath() As String
        Get
            Return m_GZSYPath
        End Get
        Set(ByVal value As String)
            m_GZSYPath = value
        End Set
    End Property

    Private m_KGDPath As String = ""

    ''' <summary>
    ''' 关键工序开工单Path
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property KGDPath() As String
        Get
            Return m_KGDPath
        End Get
        Set(ByVal value As String)
            m_KGDPath = value
        End Set
    End Property

    Private m_UserSecretLevel As DataTable = New DataTable

    ''' <summary>
    ''' 用户可选用密级
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property UserSecretLevel() As DataTable
        Get
            Return m_UserSecretLevel
        End Get
        Set(ByVal value As DataTable)
            m_UserSecretLevel = value
        End Set
    End Property

    Private m_UserSecretLevelValue As Integer = 0

    ''' <summary>
    ''' 用户密级值
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property UserSecretLevelValue() As Integer
        Get
            Return m_UserSecretLevelValue
        End Get
        Set(ByVal value As Integer)
            m_UserSecretLevelValue = value
        End Set
    End Property

    Private m_EmployeeID As String

    ''' <summary>
    ''' 用户ID
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property EmployeeID() As String
        Get
            Return m_EmployeeID
        End Get
        Set(ByVal value As String)
            m_EmployeeID = value
        End Set
    End Property

    Private m_FXDPath As String = ""

    ''' <summary>
    ''' 返修单路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property FXDPath() As String
        Get
            Return m_FXDPath
        End Get
        Set(ByVal value As String)
            m_FXDPath = value
        End Set
    End Property

    Private m_SpecToolPath As String = ""

    ''' <summary>
    ''' 工序工具信息表工装附图路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property SpecToolPath() As String
        Get
            Return m_SpecToolPath
        End Get
        Set(ByVal value As String)
            m_SpecToolPath = value
        End Set
    End Property

    Private m_ImportExcelPath As String = ""
    ''' <summary>
    ''' 导入Excel文件路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property ImportExcelPath() As String
        Get
            Return m_ImportExcelPath
        End Get
        Set(ByVal value As String)
            m_ImportExcelPath = value
        End Set
    End Property

    Private m_TemplateExcelPath As String = ""
    ''' <summary>
    ''' Excel表格模板路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property TemplateExcelPath() As String
        Get
            Return m_TemplateExcelPath
        End Get
        Set(ByVal value As String)
            m_TemplateExcelPath = value
        End Set
    End Property

    Private m_TemplateExcelPath3 As String = ""
    ''' <summary>
    ''' Excel表格模板路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property TemplateExcelPath3() As String
        Get
            Return m_TemplateExcelPath3
        End Get
        Set(ByVal value As String)
            m_TemplateExcelPath3 = value
        End Set
    End Property


    Private m_TemplateExcelPath2 As String = ""
    ''' <summary>
    ''' Excel表格模板路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property TemplateExcelPath2() As String
        Get
            Return m_TemplateExcelPath2
        End Get
        Set(ByVal value As String)
            m_TemplateExcelPath2 = value
        End Set
    End Property


    Private m_WordTemplatePath As String = ""
    ''' <summary>
    ''' WORD模板存储路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property WordTemplatePath() As String
        Get
            Return m_WordTemplatePath
        End Get
        Set(ByVal value As String)
            m_WordTemplatePath = value

        End Set
    End Property

    Private m_FirstConfirmPath As String = ""
    ''' <summary>
    ''' 新数控程序首件确认表路径
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Public Property FirstConfirm() As String
        Get
            Return m_FirstConfirmPath
        End Get
        Set(ByVal value As String)
            m_FirstConfirmPath = value
        End Set
    End Property

End Class
